/ SGI Freeware 1999 August / SGI Freeware 1999 August.iso / dist / fw_emacs.idb / usr / freeware / share / emacs / 19.34 / lisp / cl-specs.elc.z / cl-specs.elc

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 65 72 69 6b 40 6e 61 |piled by| erik@na|
|00000020| 67 67 75 6d 2e 6e 6f 20 | 6f 6e 20 53 75 6e 20 4a |ggum.no |on Sun J|
|00000030| 61 6e 20 31 34 20 30 34 | 3a 31 30 3a 34 30 20 31 |an 14 04|:10:40 1|
|00000040| 39 39 36 0a 3b 3b 3b 20 | 66 72 6f 6d 20 66 69 6c |996.;;; |from fil|
|00000050| 65 20 2f 67 64 2f 67 6e | 75 2f 65 6d 61 63 73 2f |e /gd/gn|u/emacs/|
|00000060| 31 39 2e 30 2f 6c 69 73 | 70 2f 63 6c 2d 73 70 65 |19.0/lis|p/cl-spe|
|00000070| 63 73 2e 65 6c 0a 3b 3b | 3b 20 65 6d 61 63 73 20 |cs.el.;;|; emacs |
|00000080| 76 65 72 73 69 6f 6e 20 | 31 39 2e 33 30 2e 37 30 |version |19.30.70|
|00000090| 2e 36 2e 0a 3b 3b 3b 20 | 62 79 74 65 63 6f 6d 70 |.6..;;; |bytecomp|
|000000a0| 20 76 65 72 73 69 6f 6e | 20 46 53 46 20 32 2e 31 | version| FSF 2.1|
|000000b0| 30 0a 3b 3b 3b 20 6f 70 | 74 69 6d 69 7a 61 74 69 |0.;;; op|timizati|
|000000c0| 6f 6e 20 69 73 20 6f 6e | 2e 0a 3b 3b 3b 20 74 68 |on is on|..;;; th|
|000000d0| 69 73 20 66 69 6c 65 20 | 75 73 65 73 20 6f 70 63 |is file |uses opc|
|000000e0| 6f 64 65 73 20 77 68 69 | 63 68 20 64 6f 20 6e 6f |odes whi|ch do no|
|000000f0| 74 20 65 78 69 73 74 20 | 69 6e 20 45 6d 61 63 73 |t exist |in Emacs|
|00000100| 20 31 38 2e 0a 0a 28 69 | 66 20 28 61 6e 64 20 28 | 18...(i|f (and (|
|00000110| 62 6f 75 6e 64 70 20 27 | 65 6d 61 63 73 2d 76 65 |boundp '|emacs-ve|
|00000120| 72 73 69 6f 6e 29 0a 09 | 20 28 6f 72 20 28 61 6e |rsion)..| (or (an|
|00000130| 64 20 28 62 6f 75 6e 64 | 70 20 27 65 70 6f 63 68 |d (bound|p 'epoch|
|00000140| 3a 3a 76 65 72 73 69 6f | 6e 29 20 65 70 6f 63 68 |::versio|n) epoch|
|00000150| 3a 3a 76 65 72 73 69 6f | 6e 29 0a 09 20 20 20 20 |::versio|n)..    |
|00000160| 20 28 73 74 72 69 6e 67 | 2d 6c 65 73 73 70 20 65 | (string|-lessp e|
|00000170| 6d 61 63 73 2d 76 65 72 | 73 69 6f 6e 20 22 31 39 |macs-ver|sion "19|
|00000180| 2e 32 39 22 29 29 29 0a | 20 20 20 20 28 65 72 72 |.29"))).|    (err|
|00000190| 6f 72 20 22 60 63 6c 2d | 73 70 65 63 73 2e 65 6c |or "`cl-|specs.el|
|000001a0| 27 20 77 61 73 20 63 6f | 6d 70 69 6c 65 64 20 66 |' was co|mpiled f|
|000001b0| 6f 72 20 45 6d 61 63 73 | 20 31 39 2e 32 39 20 6f |or Emacs| 19.29 o|
|000001c0| 72 20 6c 61 74 65 72 22 | 29 29 0a 0a 0a 28 62 79 |r later"|))...(by|
|000001d0| 74 65 2d 63 6f 64 65 20 | 22 c0 c1 21 88 c2 c3 21 |te-code |"..!...!|
|000001e0| 88 c4 c5 c6 c7 23 88 c4 | c8 c6 c9 23 88 c4 ca c6 |.....#..|...#....|
|000001f0| cb 23 88 c4 cc c6 cd 23 | 88 c4 ce c6 cd 23 88 c4 |.#.....#|.....#..|
|00000200| cf c6 d0 23 88 c4 d1 c6 | cf 23 88 c4 d2 c6 d3 23 |...#....|.#.....#|
|00000210| 88 c4 d4 c6 d2 23 88 c4 | d5 c6 d6 23 88 c4 d7 c6 |.....#..|...#....|
|00000220| d5 23 88 c4 d8 c6 d9 23 | 88 c4 da c6 db 23 88 c4 |.#.....#|.....#..|
|00000230| dc c6 dd 23 88 c4 de c6 | df 23 88 c4 e0 c6 e1 23 |...#....|.#.....#|
|00000240| 88 c4 e2 c6 e3 23 88 c4 | e4 c6 e5 23 88 c4 e6 c6 |.....#..|...#....|
|00000250| e7 23 88 c4 e8 c6 e7 23 | 88 c4 e9 c6 ea 23 88 c4 |.#.....#|.....#..|
|00000260| eb c6 ec 23 88 c4 ed c6 | ee 23 88 c4 ef c6 ed 23 |...#....|.#.....#|
|00000270| 88 c4 f0 c6 f1 23 88 c4 | f2 c6 f3 23 88 c4 f4 c6 |.....#..|...#....|
|00000280| f5 23 88 c4 f6 c6 f7 23 | 88 c4 f8 c6 f6 23 88 c4 |.#.....#|.....#..|
|00000290| f9 c6 fa 23 88 c4 fb c6 | f9 23 88 c4 fc c6 fd 23 |...#....|.#.....#|
|000002a0| 88 c4 fe c6 ff 23 88 c4 | 81 40 00 c6 81 41 00 23 |.....#..|.@...A.#|
|000002b0| 88 c4 81 42 00 c6 81 43 | 00 23 88 c4 81 44 00 c6 |...B...C|.#...D..|
|000002c0| 81 45 00 23 88 c4 81 46 | 00 c6 81 47 00 23 88 c4 |.E.#...F|...G.#..|
|000002d0| 81 48 00 c6 81 49 00 23 | 88 c4 81 4a 00 c6 81 48 |.H...I.#|...J...H|
|000002e0| 00 23 88 c4 81 4b 00 c6 | 81 4c 00 23 88 c4 81 4d |.#...K..|.L.#...M|
|000002f0| 00 c6 81 4e 00 23 88 c4 | 81 4f 00 c6 81 50 00 23 |...N.#..|.O...P.#|
|00000300| 88 c4 81 51 00 c6 81 52 | 00 23 88 c4 81 53 00 c6 |...Q...R|.#...S..|
|00000310| 81 54 00 23 88 c4 81 55 | 00 c6 81 56 00 23 88 c4 |.T.#...U|...V.#..|
|00000320| 81 57 00 c6 81 55 00 23 | 88 c4 81 58 00 c6 81 55 |.W...U.#|...X...U|
|00000330| 00 23 88 c4 81 59 00 c6 | 81 55 00 23 88 c4 81 5a |.#...Y..|.U.#...Z|
|00000340| 00 c6 81 5b 00 23 88 c4 | 81 5c 5c 00 c6 81 5d 00 |...[.#..|.\\...].|
|00000350| 23 88 c4 81 5e 00 c6 81 | 5c 5c 00 23 88 c4 81 5f |#...^...|\\.#..._|
|00000360| 00 c6 81 5c 5c 00 23 88 | c4 81 60 00 c6 81 5c 5c |...\\.#.|..`...\\|
|00000370| 00 23 88 c4 81 61 00 c6 | 81 5c 5c 00 23 88 c4 81 |.#...a..|.\\.#...|
|00000380| 62 00 c6 81 63 00 23 88 | c4 81 64 00 c6 81 65 00 |b...c.#.|..d...e.|
|00000390| 23 88 c4 81 66 00 c6 81 | 67 00 23 88 c4 81 68 00 |#...f...|g.#...h.|
|000003a0| c6 81 69 00 23 88 c4 81 | 6a 00 c6 81 6b 00 23 88 |..i.#...|j...k.#.|
|000003b0| c4 81 6c 00 c6 81 6d 00 | 23 88 c4 81 6e 00 c6 81 |..l...m.|#...n...|
|000003c0| 6c 00 23 88 c4 81 6f 00 | c6 cd 23 88 c4 81 70 00 |l.#...o.|..#...p.|
|000003d0| c6 81 71 00 23 88 c4 81 | 72 00 c6 81 73 00 23 88 |..q.#...|r...s.#.|
|000003e0| c4 81 74 00 c6 81 75 00 | 23 88 c4 81 76 00 c6 81 |..t...u.|#...v...|
|000003f0| 77 00 23 88 c4 81 78 00 | c6 81 79 00 23 88 c4 81 |w.#...x.|..y.#...|
|00000400| 7a 00 c6 81 7b 00 23 88 | c4 81 7c 00 c6 81 7d 00 |z...{.#.|..|...}.|
|00000410| 23 88 c4 81 7e 00 c6 81 | 7f 00 23 88 c4 81 80 00 |#...~...|..#.....|
|00000420| c6 81 81 00 23 88 c4 81 | 82 00 c6 81 83 00 23 88 |....#...|......#.|
|00000430| c4 81 84 00 c6 81 85 00 | 23 88 c4 81 86 00 c6 81 |........|#.......|
|00000440| 87 00 23 88 c4 81 88 00 | c6 81 89 00 23 88 c4 81 |..#.....|....#...|
|00000450| 8a 00 c6 81 8b 00 23 88 | c4 81 8c 00 c6 81 8d 00 |......#.|........|
|00000460| 23 88 c4 81 8e 00 c6 81 | 8f 00 23 88 c4 81 90 00 |#.......|..#.....|
|00000470| c6 81 8e 00 23 88 c4 81 | 67 00 c6 81 91 00 23 88 |....#...|g.....#.|
|00000480| c4 81 92 00 c6 81 67 00 | 23 88 c4 81 93 00 c6 81 |......g.|#.......|
|00000490| 94 00 23 88 c4 81 95 00 | c6 81 96 00 23 88 c4 81 |..#.....|....#...|
|000004a0| 97 00 c6 81 98 00 23 88 | c4 81 99 00 c6 81 9a 00 |......#.|........|
|000004b0| 23 88 c4 81 9b 00 c6 81 | 9c 00 23 88 c4 81 9b 00 |#.......|..#.....|
|000004c0| c6 81 9d 00 23 88 c4 81 | 9e 00 c6 81 9f 00 23 88 |....#...|......#.|
|000004d0| c4 81 a0 00 c6 81 a1 00 | 23 88 c4 81 a2 00 c6 81 |........|#.......|
|000004e0| a3 00 23 88 c4 81 a4 00 | c6 81 a5 00 23 88 c4 81 |..#.....|....#...|
|000004f0| a6 00 c6 81 a7 00 23 88 | c4 81 a8 00 c6 81 a9 00 |......#.|........|
|00000500| 23 88 c4 81 aa 00 c6 81 | ab 00 23 88 c4 81 ac 00 |#.......|..#.....|
|00000510| c6 81 ad 00 23 88 c4 81 | ae 00 c6 81 af 00 23 88 |....#...|......#.|
|00000520| c4 81 b0 00 c6 81 b1 00 | 23 87 22 20 5b 70 72 6f |........|#." [pro|
|00000530| 76 69 64 65 20 63 6c 2d | 73 70 65 63 73 20 72 65 |vide cl-|specs re|
|00000540| 71 75 69 72 65 20 65 64 | 65 62 75 67 20 70 75 74 |quire ed|ebug put|
|00000550| 20 62 6c 6f 63 6b 20 65 | 64 65 62 75 67 2d 66 6f | block e|debug-fo|
|00000560| 72 6d 2d 73 70 65 63 20 | 28 73 79 6d 62 6f 6c 70 |rm-spec |(symbolp|
|00000570| 20 62 6f 64 79 29 20 72 | 65 74 75 72 6e 20 28 26 | body) r|eturn (&|
|00000580| 6f 70 74 69 6f 6e 61 6c | 20 66 6f 72 6d 29 20 72 |optional| form) r|
|00000590| 65 74 75 72 6e 2d 66 72 | 6f 6d 20 28 73 79 6d 62 |eturn-fr|om (symb|
|000005a0| 6f 6c 70 20 26 6f 70 74 | 69 6f 6e 61 6c 20 66 6f |olp &opt|ional fo|
|000005b0| 72 6d 29 20 77 68 65 6e | 20 74 20 75 6e 6c 65 73 |rm) when| t unles|
|000005c0| 73 20 63 61 73 65 20 28 | 66 6f 72 6d 20 26 72 65 |s case (|form &re|
|000005d0| 73 74 20 28 73 65 78 70 | 20 62 6f 64 79 29 29 20 |st (sexp| body)) |
|000005e0| 65 63 61 73 65 20 64 6f | 20 28 28 26 72 65 73 74 |ecase do| ((&rest|
|000005f0| 20 26 6f 72 20 73 79 6d | 62 6f 6c 70 20 28 73 79 | &or sym|bolp (sy|
|00000600| 6d 62 6f 6c 70 20 26 6f | 70 74 69 6f 6e 61 6c 20 |mbolp &o|ptional |
|00000610| 66 6f 72 6d 20 66 6f 72 | 6d 29 29 20 28 66 6f 72 |form for|m)) (for|
|00000620| 6d 20 62 6f 64 79 29 20 | 63 6c 2d 64 65 63 6c 61 |m body) |cl-decla|
|00000630| 72 61 74 69 6f 6e 73 20 | 62 6f 64 79 29 20 64 6f |rations |body) do|
|00000640| 2a 20 64 6f 6c 69 73 74 | 20 28 28 73 79 6d 62 6f |* dolist| ((symbo|
|00000650| 6c 70 20 66 6f 72 6d 20 | 26 6f 70 74 69 6f 6e 61 |lp form |&optiona|
|00000660| 6c 20 66 6f 72 6d 29 20 | 63 6c 2d 64 65 63 6c 61 |l form) |cl-decla|
|00000670| 72 61 74 69 6f 6e 73 20 | 62 6f 64 79 29 20 64 6f |rations |body) do|
|00000680| 74 69 6d 65 73 20 64 6f | 2d 73 79 6d 62 6f 6c 73 |times do|-symbols|
|00000690| 20 28 28 73 79 6d 62 6f | 6c 70 20 26 6f 70 74 69 | ((symbo|lp &opti|
|000006a0| 6f 6e 61 6c 20 66 6f 72 | 6d 20 66 6f 72 6d 29 20 |onal for|m form) |
|000006b0| 63 6c 2d 64 65 63 6c 61 | 72 61 74 69 6f 6e 73 20 |cl-decla|rations |
|000006c0| 62 6f 64 79 29 20 64 6f | 2d 61 6c 6c 2d 73 79 6d |body) do|-all-sym|
|000006d0| 62 6f 6c 73 20 28 28 73 | 79 6d 62 6f 6c 70 20 26 |bols ((s|ymbolp &|
|000006e0| 6f 70 74 69 6f 6e 61 6c | 20 66 6f 72 6d 29 20 63 |optional| form) c|
|000006f0| 6c 2d 64 65 63 6c 61 72 | 61 74 69 6f 6e 73 20 62 |l-declar|ations b|
|00000700| 6f 64 79 29 20 6d 75 6c | 74 69 70 6c 65 2d 76 61 |ody) mul|tiple-va|
|00000710| 6c 75 65 2d 6c 69 73 74 | 20 28 66 6f 72 6d 29 20 |lue-list| (form) |
|00000720| 6d 75 6c 74 69 70 6c 65 | 2d 76 61 6c 75 65 2d 63 |multiple|-value-c|
|00000730| 61 6c 6c 20 28 66 75 6e | 63 74 69 6f 6e 2d 66 6f |all (fun|ction-fo|
|00000740| 72 6d 20 62 6f 64 79 29 | 20 6d 75 6c 74 69 70 6c |rm body)| multipl|
|00000750| 65 2d 76 61 6c 75 65 2d | 62 69 6e 64 20 28 28 26 |e-value-|bind ((&|
|00000760| 72 65 73 74 20 73 79 6d | 62 6f 6c 70 29 20 66 6f |rest sym|bolp) fo|
|00000770| 72 6d 20 63 6c 2d 64 65 | 63 6c 61 72 61 74 69 6f |rm cl-de|claratio|
|00000780| 6e 73 20 62 6f 64 79 29 | 20 6d 75 6c 74 69 70 6c |ns body)| multipl|
|00000790| 65 2d 76 61 6c 75 65 2d | 73 65 74 71 20 28 28 26 |e-value-|setq ((&|
|000007a0| 72 65 73 74 20 73 79 6d | 62 6f 6c 70 29 20 66 6f |rest sym|bolp) fo|
|000007b0| 72 6d 29 20 6d 75 6c 74 | 69 70 6c 65 2d 76 61 6c |rm) mult|iple-val|
|000007c0| 75 65 2d 70 72 6f 67 31 | 20 28 66 6f 72 6d 20 62 |ue-prog1| (form b|
|000007d0| 6f 64 79 29 20 6c 65 78 | 69 63 61 6c 2d 6c 65 74 |ody) lex|ical-let|
|000007e0| 20 6c 65 74 20 6c 65 78 | 69 63 61 6c 2d 6c 65 74 | let lex|ical-let|
|000007f0| 2a 20 70 73 65 74 71 20 | 73 65 74 71 20 70 72 6f |* psetq |setq pro|
|00000800| 67 76 20 28 66 6f 72 6d | 20 66 6f 72 6d 20 62 6f |gv (form| form bo|
|00000810| 64 79 29 20 66 6c 65 74 | 20 28 28 26 72 65 73 74 |dy) flet| ((&rest|
|00000820| 20 28 64 65 66 75 6e 2a | 29 29 20 63 6c 2d 64 65 | (defun*|)) cl-de|
|00000830| 63 6c 61 72 61 74 69 6f | 6e 73 20 62 6f 64 79 29 |claratio|ns body)|
|00000840| 20 6c 61 62 65 6c 73 20 | 6d 61 63 72 6f 6c 65 74 | labels |macrolet|
|00000850| 20 28 28 26 72 65 73 74 | 20 28 26 64 65 66 69 6e | ((&rest| (&defin|
|00000860| 65 20 6e 61 6d 65 20 28 | 26 72 65 73 74 20 61 72 |e name (|&rest ar|
|00000870| 67 29 20 63 6c 2d 64 65 | 63 6c 61 72 61 74 69 6f |g) cl-de|claratio|
|00000880| 6e 73 2d 6f 72 2d 73 74 | 72 69 6e 67 20 64 65 66 |ns-or-st|ring def|
|00000890| 2d 62 6f 64 79 29 29 20 | 63 6c 2d 64 65 63 6c 61 |-body)) |cl-decla|
|000008a0| 72 61 74 69 6f 6e 73 20 | 62 6f 64 79 29 20 73 79 |rations |body) sy|
|000008b0| 6d 62 6f 6c 2d 6d 61 63 | 72 6f 6c 65 74 20 28 28 |mbol-mac|rolet ((|
|000008c0| 26 72 65 73 74 20 28 73 | 79 6d 62 6f 6c 20 73 65 |&rest (s|ymbol se|
|000008d0| 78 70 29 29 20 63 6c 2d | 64 65 63 6c 61 72 61 74 |xp)) cl-|declarat|
|000008e0| 69 6f 6e 73 20 62 6f 64 | 79 29 20 64 65 73 74 72 |ions bod|y) destr|
|000008f0| 75 63 74 75 72 69 6e 67 | 2d 62 69 6e 64 20 28 26 |ucturing|-bind (&|
|00000900| 64 65 66 69 6e 65 20 63 | 6c 2d 6d 61 63 72 6f 2d |define c|l-macro-|
|00000910| 6c 69 73 74 20 66 6f 72 | 6d 20 63 6c 2d 64 65 63 |list for|m cl-dec|
|00000920| 6c 61 72 61 74 69 6f 6e | 73 20 64 65 66 2d 62 6f |laration|s def-bo|
|00000930| 64 79 29 20 73 65 74 66 | 20 28 26 72 65 73 74 20 |dy) setf| (&rest |
|00000940| 5b 70 6c 61 63 65 20 66 | 6f 72 6d 5d 29 20 70 73 |[place f|orm]) ps|
|00000950| 65 74 66 20 6c 65 74 66 | 20 28 28 26 72 65 73 74 |etf letf| ((&rest|
|00000960| 20 28 67 61 74 65 20 70 | 6c 61 63 65 20 26 6f 70 | (gate p|lace &op|
|00000970| 74 69 6f 6e 61 6c 20 66 | 6f 72 6d 29 29 20 62 6f |tional f|orm)) bo|
|00000980| 64 79 29 20 6c 65 74 66 | 2a 20 64 65 66 73 65 74 |dy) letf|* defset|
|00000990| 66 20 28 26 64 65 66 69 | 6e 65 20 6e 61 6d 65 20 |f (&defi|ne name |
|000009a0| 5b 26 6f 72 20 5b 73 79 | 6d 62 6f 6c 70 20 26 6f |[&or [sy|mbolp &o|
|000009b0| 70 74 69 6f 6e 61 6c 20 | 73 74 72 69 6e 67 70 5d |ptional |stringp]|
|000009c0| 20 5b 63 6c 2d 6c 61 6d | 62 64 61 2d 6c 69 73 74 | [cl-lam|bda-list|
|000009d0| 20 28 73 79 6d 62 6f 6c | 70 29 5d 5d 20 63 6c 2d | (symbol|p)]] cl-|
|000009e0| 64 65 63 6c 61 72 61 74 | 69 6f 6e 73 2d 6f 72 2d |declarat|ions-or-|
|000009f0| 73 74 72 69 6e 67 20 64 | 65 66 2d 62 6f 64 79 29 |string d|ef-body)|
|00000a00| 20 64 65 66 69 6e 65 2d | 73 65 74 66 2d 6d 65 74 | define-|setf-met|
|00000a10| 68 6f 64 20 28 26 64 65 | 66 69 6e 65 20 6e 61 6d |hod (&de|fine nam|
|00000a20| 65 20 63 6c 2d 6c 61 6d | 62 64 61 2d 6c 69 73 74 |e cl-lam|bda-list|
|00000a30| 20 63 6c 2d 64 65 63 6c | 61 72 61 74 69 6f 6e 73 | cl-decl|arations|
|00000a40| 2d 6f 72 2d 73 74 72 69 | 6e 67 20 64 65 66 2d 62 |-or-stri|ng def-b|
|00000a50| 6f 64 79 29 20 64 65 66 | 69 6e 65 2d 6d 6f 64 69 |ody) def|ine-modi|
|00000a60| 66 79 2d 6d 61 63 72 6f | 20 28 26 64 65 66 69 6e |fy-macro| (&defin|
|00000a70| 65 20 6e 61 6d 65 20 63 | 6c 2d 6c 61 6d 62 64 61 |e name c|l-lambda|
|00000a80| 2d 6c 69 73 74 20 73 79 | 6d 62 6f 6c 70 20 26 6f |-list sy|mbolp &o|
|00000a90| 70 74 69 6f 6e 61 6c 20 | 73 74 72 69 6e 67 70 29 |ptional |stringp)|
|00000aa0| 20 63 61 6c 6c 66 20 28 | 66 75 6e 63 74 69 6f 6e | callf (|function|
|00000ab0| 2a 20 70 6c 61 63 65 20 | 26 72 65 73 74 20 66 6f |* place |&rest fo|
|00000ac0| 72 6d 29 20 63 61 6c 6c | 66 32 20 28 66 75 6e 63 |rm) call|f2 (func|
|00000ad0| 74 69 6f 6e 2a 20 66 6f | 72 6d 20 70 6c 61 63 65 |tion* fo|rm place|
|00000ae0| 20 26 72 65 73 74 20 66 | 6f 72 6d 29 20 72 65 6d | &rest f|orm) rem|
|00000af0| 66 20 28 70 6c 61 63 65 | 20 66 6f 72 6d 29 20 69 |f (place| form) i|
|00000b00| 6e 63 66 20 28 70 6c 61 | 63 65 20 26 6f 70 74 69 |ncf (pla|ce &opti|
|00000b10| 6f 6e 61 6c 20 66 6f 72 | 6d 29 20 64 65 63 66 20 |onal for|m) decf |
|00000b20| 70 75 73 68 20 28 66 6f | 72 6d 20 70 6c 61 63 65 |push (fo|rm place|
|00000b30| 29 20 70 75 73 68 6e 65 | 77 20 28 66 6f 72 6d 20 |) pushne|w (form |
|00000b40| 70 6c 61 63 65 20 26 72 | 65 73 74 20 26 6f 72 20 |place &r|est &or |
|00000b50| 5b 5b 26 6f 72 20 22 3a | 74 65 73 74 22 20 22 3a |[[&or ":|test" ":|
|00000b60| 74 65 73 74 2d 6e 6f 74 | 22 20 22 3a 6b 65 79 22 |test-not|" ":key"|
|00000b70| 5d 20 66 75 6e 63 74 69 | 6f 6e 2d 66 6f 72 6d 5d |] functi|on-form]|
|00000b80| 20 5b 65 64 65 62 75 67 | 2d 6b 65 79 77 6f 72 64 | [edebug|-keyword|
|00000b90| 70 20 66 6f 72 6d 5d 29 | 20 70 6f 70 20 28 70 6c |p form])| pop (pl|
|00000ba0| 61 63 65 29 20 73 68 69 | 66 74 66 20 28 26 72 65 |ace) shi|ftf (&re|
|00000bb0| 73 74 20 70 6c 61 63 65 | 29 20 72 6f 74 61 74 65 |st place|) rotate|
|00000bc0| 66 20 28 26 72 65 73 74 | 20 70 6c 61 63 65 29 20 |f (&rest| place) |
|00000bd0| 73 6f 6d 65 20 28 66 75 | 6e 63 74 69 6f 6e 2d 66 |some (fu|nction-f|
|00000be0| 6f 72 6d 20 66 6f 72 6d | 20 26 72 65 73 74 20 66 |orm form| &rest f|
|00000bf0| 6f 72 6d 29 20 65 76 65 | 72 79 20 6e 6f 74 61 6e |orm) eve|ry notan|
|00000c00| 79 20 6e 6f 74 65 76 65 | 72 79 20 6d 61 70 20 28 |y noteve|ry map (|
|00000c10| 66 6f 72 6d 20 66 75 6e | 63 74 69 6f 6e 2d 66 6f |form fun|ction-fo|
|00000c20| 72 6d 20 66 6f 72 6d 20 | 26 72 65 73 74 20 66 6f |rm form |&rest fo|
|00000c30| 72 6d 29 20 6d 61 70 6c | 69 73 74 20 28 66 75 6e |rm) mapl|ist (fun|
|00000c40| 63 74 69 6f 6e 2d 66 6f | 72 6d 20 66 6f 72 6d 20 |ction-fo|rm form |
|00000c50| 26 72 65 73 74 20 66 6f | 72 6d 29 20 6d 61 70 63 |&rest fo|rm) mapc|
|00000c60| 20 6d 61 70 6c 20 6d 61 | 70 63 61 6e 20 6d 61 70 | mapl ma|pcan map|
|00000c70| 63 6f 6e 20 72 65 64 75 | 63 65 20 28 66 75 6e 63 |con redu|ce (func|
|00000c80| 74 69 6f 6e 2d 66 6f 72 | 6d 20 66 6f 72 6d 20 26 |tion-for|m form &|
|00000c90| 72 65 73 74 20 66 6f 72 | 6d 29 20 63 6c 2d 74 79 |rest for|m) cl-ty|
|00000ca0| 70 65 2d 73 70 65 63 20 | 28 73 65 78 70 29 20 64 |pe-spec |(sexp) d|
|00000cb0| 65 66 74 79 70 65 20 64 | 65 66 6d 61 63 72 6f 2a |eftype d|efmacro*|
|00000cc0| 20 63 68 65 63 6b 2d 74 | 79 70 65 20 28 70 6c 61 | check-t|ype (pla|
|00000cd0| 63 65 20 63 6c 2d 74 79 | 70 65 2d 73 70 65 63 20 |ce cl-ty|pe-spec |
|00000ce0| 26 6f 70 74 69 6f 6e 61 | 6c 20 73 74 72 69 6e 67 |&optiona|l string|
|00000cf0| 70 29 20 61 73 73 65 72 | 74 20 28 66 6f 72 6d 20 |p) asser|t (form |
|00000d00| 26 72 65 73 74 20 66 6f | 72 6d 29 20 74 79 70 65 |&rest fo|rm) type|
|00000d10| 63 61 73 65 20 28 66 6f | 72 6d 20 26 72 65 73 74 |case (fo|rm &rest|
|00000d20| 20 28 5b 26 6f 72 20 63 | 6c 2d 74 79 70 65 2d 73 | ([&or c|l-type-s|
|00000d30| 70 65 63 20 22 6f 74 68 | 65 72 77 69 73 65 22 5d |pec "oth|erwise"]|
|00000d40| 20 62 6f 64 79 29 29 20 | 65 74 79 70 65 63 61 73 | body)) |etypecas|
|00000d50| 65 20 69 67 6e 6f 72 65 | 2d 65 72 72 6f 72 73 20 |e ignore|-errors |
|00000d60| 65 76 61 6c 2d 77 68 65 | 6e 20 28 28 26 72 65 73 |eval-whe|n ((&res|
|00000d70| 74 20 26 6f 72 20 22 63 | 6f 6d 70 69 6c 65 22 20 |t &or "c|ompile" |
|00000d80| 22 6c 6f 61 64 22 20 22 | 65 76 61 6c 22 29 20 62 |"load" "|eval") b|
|00000d90| 6f 64 79 29 20 6c 6f 61 | 64 2d 74 69 6d 65 2d 76 |ody) loa|d-time-v|
|00000da0| 61 6c 75 65 20 28 66 6f | 72 6d 20 26 6f 70 74 69 |alue (fo|rm &opti|
|00000db0| 6f 6e 61 6c 20 26 6f 72 | 20 22 74 22 20 22 6e 69 |onal &or| "t" "ni|
|00000dc0| 6c 22 29 20 63 6c 2d 64 | 65 63 6c 2d 73 70 65 63 |l") cl-d|ecl-spec|
|00000dd0| 20 28 28 73 79 6d 62 6f | 6c 70 20 26 72 65 73 74 | ((symbo|lp &rest|
|00000de0| 20 73 65 78 70 29 29 20 | 63 6c 2d 64 65 63 6c 61 | sexp)) |cl-decla|
|00000df0| 72 61 74 69 6f 6e 73 20 | 28 26 72 65 73 74 20 28 |rations |(&rest (|
|00000e00| 22 64 65 63 6c 61 72 65 | 22 20 26 72 65 73 74 20 |"declare|" &rest |
|00000e10| 63 6c 2d 64 65 63 6c 2d | 73 70 65 63 29 29 20 63 |cl-decl-|spec)) c|
|00000e20| 6c 2d 64 65 63 6c 61 72 | 61 74 69 6f 6e 73 2d 6f |l-declar|ations-o|
|00000e30| 72 2d 73 74 72 69 6e 67 | 20 28 26 6f 72 20 73 74 |r-string| (&or st|
|00000e40| 72 69 6e 67 70 20 63 6c | 2d 64 65 63 6c 61 72 61 |ringp cl|-declara|
|00000e50| 74 69 6f 6e 73 29 20 64 | 65 63 6c 61 69 6d 20 28 |tions) d|eclaim (|
|00000e60| 26 72 65 73 74 20 63 6c | 2d 64 65 63 6c 2d 73 70 |&rest cl|-decl-sp|
|00000e70| 65 63 29 20 64 65 63 6c | 61 72 65 20 28 26 72 65 |ec) decl|are (&re|
|00000e80| 73 74 20 63 6c 2d 64 65 | 63 6c 2d 73 70 65 63 29 |st cl-de|cl-spec)|
|00000e90| 20 6c 6f 63 61 6c 6c 79 | 20 28 63 6c 2d 64 65 63 | locally| (cl-dec|
|00000ea0| 6c 61 72 61 74 69 6f 6e | 73 20 26 72 65 73 74 20 |laration|s &rest |
|00000eb0| 66 6f 72 6d 29 20 74 68 | 65 20 28 63 6c 2d 74 79 |form) th|e (cl-ty|
|00000ec0| 70 65 2d 73 70 65 63 20 | 66 6f 72 6d 29 20 63 6c |pe-spec |form) cl|
|00000ed0| 2d 6c 61 6d 62 64 61 2d | 6c 69 73 74 20 28 28 5b |-lambda-|list (([|
|00000ee0| 26 72 65 73 74 20 61 72 | 67 5d 20 5b 26 6f 70 74 |&rest ar|g] [&opt|
|00000ef0| 69 6f 6e 61 6c 20 5b 22 | 26 6f 70 74 69 6f 6e 61 |ional ["|&optiona|
|00000f00| 6c 22 20 63 6c 2d 26 6f | 70 74 69 6f 6e 61 6c 2d |l" cl-&o|ptional-|
|00000f10| 61 72 67 20 26 72 65 73 | 74 20 63 6c 2d 26 6f 70 |arg &res|t cl-&op|
|00000f20| 74 69 6f 6e 61 6c 2d 61 | 72 67 5d 5d 20 5b 26 6f |tional-a|rg]] [&o|
|00000f30| 70 74 69 6f 6e 61 6c 20 | 5b 22 26 72 65 73 74 22 |ptional |["&rest"|
|00000f40| 20 61 72 67 5d 5d 20 5b | 26 6f 70 74 69 6f 6e 61 | arg]] [|&optiona|
|00000f50| 6c 20 5b 22 26 6b 65 79 | 22 20 5b 63 6c 2d 26 6b |l ["&key|" [cl-&k|
|00000f60| 65 79 2d 61 72 67 20 26 | 72 65 73 74 20 63 6c 2d |ey-arg &|rest cl-|
|00000f70| 26 6b 65 79 2d 61 72 67 | 5d 20 26 6f 70 74 69 6f |&key-arg|] &optio|
|00000f80| 6e 61 6c 20 22 26 61 6c | 6c 6f 77 2d 6f 74 68 65 |nal "&al|low-othe|
|00000f90| 72 2d 6b 65 79 77 6f 72 | 64 73 22 5d 5d 20 5b 26 |r-keywor|ds"]] [&|
|00000fa0| 6f 70 74 69 6f 6e 61 6c | 20 5b 22 26 61 75 78 22 |optional| ["&aux"|
|00000fb0| 20 26 72 65 73 74 20 26 | 6f 72 20 28 73 79 6d 62 | &rest &|or (symb|
|00000fc0| 6f 6c 70 20 26 6f 70 74 | 69 6f 6e 61 6c 20 64 65 |olp &opt|ional de|
|00000fd0| 66 2d 66 6f 72 6d 29 20 | 73 79 6d 62 6f 6c 70 5d |f-form) |symbolp]|
|00000fe0| 5d 29 29 20 63 6c 2d 26 | 6f 70 74 69 6f 6e 61 6c |])) cl-&|optional|
|00000ff0| 2d 61 72 67 20 28 26 6f | 72 20 28 61 72 67 20 26 |-arg (&o|r (arg &|
|00001000| 6f 70 74 69 6f 6e 61 6c | 20 64 65 66 2d 66 6f 72 |optional| def-for|
|00001010| 6d 20 61 72 67 29 20 61 | 72 67 29 20 63 6c 2d 26 |m arg) a|rg) cl-&|
|00001020| 6b 65 79 2d 61 72 67 20 | 28 26 6f 72 20 28 5b 26 |key-arg |(&or ([&|
|00001030| 6f 72 20 28 73 79 6d 62 | 6f 6c 70 20 61 72 67 29 |or (symb|olp arg)|
|00001040| 20 61 72 67 5d 20 26 6f | 70 74 69 6f 6e 61 6c 20 | arg] &o|ptional |
|00001050| 64 65 66 2d 66 6f 72 6d | 20 61 72 67 29 20 61 72 |def-form| arg) ar|
|00001060| 67 29 20 63 6c 2d 6d 61 | 63 72 6f 2d 6c 69 73 74 |g) cl-ma|cro-list|
|00001070| 20 28 28 5b 26 6f 70 74 | 69 6f 6e 61 6c 20 22 26 | (([&opt|ional "&|
|00001080| 65 6e 76 69 72 6f 6e 6d | 65 6e 74 22 20 61 72 67 |environm|ent" arg|
|00001090| 5d 20 5b 26 72 65 73 74 | 20 63 6c 2d 6d 61 63 72 |] [&rest| cl-macr|
|000010a0| 6f 2d 61 72 67 5d 20 5b | 26 6f 70 74 69 6f 6e 61 |o-arg] [|&optiona|
|000010b0| 6c 20 5b 22 26 6f 70 74 | 69 6f 6e 61 6c 22 20 26 |l ["&opt|ional" &|
|000010c0| 72 65 73 74 20 26 6f 72 | 20 28 63 6c 2d 6d 61 63 |rest &or| (cl-mac|
|000010d0| 72 6f 2d 61 72 67 20 26 | 6f 70 74 69 6f 6e 61 6c |ro-arg &|optional|
|000010e0| 20 64 65 66 2d 66 6f 72 | 6d 20 63 6c 2d 6d 61 63 | def-for|m cl-mac|
|000010f0| 72 6f 2d 61 72 67 29 20 | 61 72 67 5d 5d 20 5b 26 |ro-arg) |arg]] [&|
|00001100| 6f 70 74 69 6f 6e 61 6c | 20 5b 5b 26 6f 72 20 22 |optional| [[&or "|
|00001110| 26 72 65 73 74 22 20 22 | 26 62 6f 64 79 22 5d 20 |&rest" "|&body"] |
|00001120| 63 6c 2d 6d 61 63 72 6f | 2d 61 72 67 5d 5d 20 5b |cl-macro|-arg]] [|
|00001130| 26 6f 70 74 69 6f 6e 61 | 6c 20 5b 22 26 6b 65 79 |&optiona|l ["&key|
|00001140| 22 20 5b 26 72 65 73 74 | 20 5b 26 6f 72 20 28 5b |" [&rest| [&or ([|
|00001150| 26 6f 72 20 28 73 79 6d | 62 6f 6c 70 20 63 6c 2d |&or (sym|bolp cl-|
|00001160| 6d 61 63 72 6f 2d 61 72 | 67 29 20 61 72 67 5d 20 |macro-ar|g) arg] |
|00001170| 26 6f 70 74 69 6f 6e 61 | 6c 20 64 65 66 2d 66 6f |&optiona|l def-fo|
|00001180| 72 6d 20 63 6c 2d 6d 61 | 63 72 6f 2d 61 72 67 29 |rm cl-ma|cro-arg)|
|00001190| 20 61 72 67 5d 5d 20 26 | 6f 70 74 69 6f 6e 61 6c | arg]] &|optional|
|000011a0| 20 22 26 61 6c 6c 6f 77 | 2d 6f 74 68 65 72 2d 6b | "&allow|-other-k|
|000011b0| 65 79 77 6f 72 64 73 22 | 5d 5d 20 5b 26 6f 70 74 |eywords"|]] [&opt|
|000011c0| 69 6f 6e 61 6c 20 5b 22 | 26 61 75 78 22 20 26 72 |ional ["|&aux" &r|
|000011d0| 65 73 74 20 26 6f 72 20 | 28 73 79 6d 62 6f 6c 70 |est &or |(symbolp|
|000011e0| 20 26 6f 70 74 69 6f 6e | 61 6c 20 64 65 66 2d 66 | &option|al def-f|
|000011f0| 6f 72 6d 29 20 73 79 6d | 62 6f 6c 70 5d 5d 20 5b |orm) sym|bolp]] [|
|00001200| 26 6f 70 74 69 6f 6e 61 | 6c 20 22 26 65 6e 76 69 |&optiona|l "&envi|
|00001210| 72 6f 6e 6d 65 6e 74 22 | 20 61 72 67 5d 29 29 20 |ronment"| arg])) |
|00001220| 63 6c 2d 6d 61 63 72 6f | 2d 61 72 67 20 28 26 6f |cl-macro|-arg (&o|
|00001230| 72 20 61 72 67 20 63 6c | 2d 6d 61 63 72 6f 2d 6c |r arg cl|-macro-l|
|00001240| 69 73 74 31 29 20 63 6c | 2d 6d 61 63 72 6f 2d 6c |ist1) cl|-macro-l|
|00001250| 69 73 74 31 20 28 28 5b | 26 6f 70 74 69 6f 6e 61 |ist1 (([|&optiona|
|00001260| 6c 20 22 26 77 68 6f 6c | 65 22 20 61 72 67 5d 20 |l "&whol|e" arg] |
|00001270| 5b 26 72 65 73 74 20 63 | 6c 2d 6d 61 63 72 6f 2d |[&rest c|l-macro-|
|00001280| 61 72 67 5d 20 5b 26 6f | 70 74 69 6f 6e 61 6c 20 |arg] [&o|ptional |
|00001290| 5b 22 26 6f 70 74 69 6f | 6e 61 6c 22 20 26 72 65 |["&optio|nal" &re|
|000012a0| 73 74 20 26 6f 72 20 28 | 63 6c 2d 6d 61 63 72 6f |st &or (|cl-macro|
|000012b0| 2d 61 72 67 20 26 6f 70 | 74 69 6f 6e 61 6c 20 64 |-arg &op|tional d|
|000012c0| 65 66 2d 66 6f 72 6d 20 | 63 6c 2d 6d 61 63 72 6f |ef-form |cl-macro|
|000012d0| 2d 61 72 67 29 20 61 72 | 67 5d 5d 20 5b 26 6f 70 |-arg) ar|g]] [&op|
|000012e0| 74 69 6f 6e 61 6c 20 5b | 5b 26 6f 72 20 22 26 72 |tional [|[&or "&r|
|000012f0| 65 73 74 22 20 22 26 62 | 6f 64 79 22 5d 20 63 6c |est" "&b|ody"] cl|
|00001300| 2d 6d 61 63 72 6f 2d 61 | 72 67 5d 5d 20 5b 26 6f |-macro-a|rg]] [&o|
|00001310| 70 74 69 6f 6e 61 6c 20 | 5b 22 26 6b 65 79 22 20 |ptional |["&key" |
|00001320| 5b 26 72 65 73 74 20 5b | 26 6f 72 20 28 5b 26 6f |[&rest [|&or ([&o|
|00001330| 72 20 28 73 79 6d 62 6f | 6c 70 20 63 6c 2d 6d 61 |r (symbo|lp cl-ma|
|00001340| 63 72 6f 2d 61 72 67 29 | 20 61 72 67 5d 20 26 6f |cro-arg)| arg] &o|
|00001350| 70 74 69 6f 6e 61 6c 20 | 64 65 66 2d 66 6f 72 6d |ptional |def-form|
|00001360| 20 63 6c 2d 6d 61 63 72 | 6f 2d 61 72 67 29 20 61 | cl-macr|o-arg) a|
|00001370| 72 67 5d 5d 20 26 6f 70 | 74 69 6f 6e 61 6c 20 22 |rg]] &op|tional "|
|00001380| 26 61 6c 6c 6f 77 2d 6f | 74 68 65 72 2d 6b 65 79 |&allow-o|ther-key|
|00001390| 77 6f 72 64 73 22 5d 5d | 20 5b 26 6f 70 74 69 6f |words"]]| [&optio|
|000013a0| 6e 61 6c 20 5b 22 26 61 | 75 78 22 20 26 72 65 73 |nal ["&a|ux" &res|
|000013b0| 74 20 26 6f 72 20 28 73 | 79 6d 62 6f 6c 70 20 26 |t &or (s|ymbolp &|
|000013c0| 6f 70 74 69 6f 6e 61 6c | 20 64 65 66 2d 66 6f 72 |optional| def-for|
|000013d0| 6d 29 20 73 79 6d 62 6f | 6c 70 5d 5d 20 2e 20 5b |m) symbo|lp]] . [|
|000013e0| 26 6f 72 20 61 72 67 20 | 6e 69 6c 5d 29 29 20 64 |&or arg |nil])) d|
|000013f0| 65 66 75 6e 2a 20 28 26 | 64 65 66 69 6e 65 20 5b |efun* (&|define [|
|00001400| 26 6f 72 20 6e 61 6d 65 | 20 28 22 73 65 74 66 22 |&or name| ("setf"|
|00001410| 20 3a 6e 61 6d 65 20 73 | 65 74 66 20 6e 61 6d 65 | :name s|etf name|
|00001420| 29 5d 20 63 6c 2d 6c 61 | 6d 62 64 61 2d 6c 69 73 |)] cl-la|mbda-lis|
|00001430| 74 20 63 6c 2d 64 65 63 | 6c 61 72 61 74 69 6f 6e |t cl-dec|laration|
|00001440| 73 2d 6f 72 2d 73 74 72 | 69 6e 67 20 5b 26 6f 70 |s-or-str|ing [&op|
|00001450| 74 69 6f 6e 61 6c 20 28 | 22 69 6e 74 65 72 61 63 |tional (|"interac|
|00001460| 74 69 76 65 22 20 69 6e | 74 65 72 61 63 74 69 76 |tive" in|teractiv|
|00001470| 65 29 5d 20 64 65 66 2d | 62 6f 64 79 29 20 64 65 |e)] def-|body) de|
|00001480| 66 73 75 62 73 74 2a 20 | 28 26 64 65 66 69 6e 65 |fsubst* |(&define|
|00001490| 20 6e 61 6d 65 20 63 6c | 2d 6d 61 63 72 6f 2d 6c | name cl|-macro-l|
|000014a0| 69 73 74 20 63 6c 2d 64 | 65 63 6c 61 72 61 74 69 |ist cl-d|eclarati|
|000014b0| 6f 6e 73 2d 6f 72 2d 73 | 74 72 69 6e 67 20 64 65 |ons-or-s|tring de|
|000014c0| 66 2d 62 6f 64 79 29 20 | 64 65 66 69 6e 65 2d 63 |f-body) |define-c|
|000014d0| 6f 6d 70 69 6c 65 72 2d | 6d 61 63 72 6f 20 66 75 |ompiler-|macro fu|
|000014e0| 6e 63 74 69 6f 6e 2a 20 | 28 26 6f 72 20 73 79 6d |nction* |(&or sym|
|000014f0| 62 6f 6c 70 20 63 6c 2d | 6c 61 6d 62 64 61 2d 65 |bolp cl-|lambda-e|
|00001500| 78 70 72 29 20 63 6c 2d | 6c 61 6d 62 64 61 2d 65 |xpr) cl-|lambda-e|
|00001510| 78 70 72 20 28 26 64 65 | 66 69 6e 65 20 28 22 6c |xpr (&de|fine ("l|
|00001520| 61 6d 62 64 61 22 20 63 | 6c 2d 6c 61 6d 62 64 61 |ambda" c|l-lambda|
|00001530| 2d 6c 69 73 74 20 64 65 | 66 2d 62 6f 64 79 29 29 |-list de|f-body))|
|00001540| 20 66 75 6e 63 74 69 6f | 6e 2d 66 6f 72 6d 20 28 | functio|n-form (|
|00001550| 26 6f 72 20 28 5b 26 6f | 72 20 22 71 75 6f 74 65 |&or ([&o|r "quote|
|00001560| 22 20 22 66 75 6e 63 74 | 69 6f 6e 22 5d 20 26 6f |" "funct|ion"] &o|
|00001570| 72 20 73 79 6d 62 6f 6c | 70 20 6c 61 6d 62 64 61 |r symbol|p lambda|
|00001580| 2d 65 78 70 72 29 20 28 | 22 66 75 6e 63 74 69 6f |-expr) (|"functio|
|00001590| 6e 2a 22 20 63 6c 2d 6c | 61 6d 62 64 61 2d 65 78 |n*" cl-l|ambda-ex|
|000015a0| 70 72 29 20 66 6f 72 6d | 29 20 64 65 66 73 74 72 |pr) form|) defstr|
|000015b0| 75 63 74 20 28 26 64 65 | 66 69 6e 65 20 5b 26 6f |uct (&de|fine [&o|
|000015c0| 72 20 73 79 6d 62 6f 6c | 70 20 28 67 61 74 65 20 |r symbol|p (gate |
|000015d0| 73 79 6d 62 6f 6c 70 20 | 26 72 65 73 74 20 28 26 |symbolp |&rest (&|
|000015e0| 6f 72 20 5b 22 3a 63 6f | 6e 63 2d 6e 61 6d 65 22 |or [":co|nc-name"|
|000015f0| 20 26 6f 72 20 73 74 72 | 69 6e 67 70 20 22 6e 69 | &or str|ingp "ni|
|00001600| 6c 22 5d 20 5b 22 3a 63 | 6f 6e 73 74 72 75 63 74 |l"] [":c|onstruct|
|00001610| 6f 72 22 20 73 79 6d 62 | 6f 6c 70 20 26 6f 70 74 |or" symb|olp &opt|
|00001620| 69 6f 6e 61 6c 20 63 6c | 2d 6c 61 6d 62 64 61 2d |ional cl|-lambda-|
|00001630| 6c 69 73 74 5d 20 5b 22 | 3a 63 6f 70 69 65 72 22 |list] ["|:copier"|
|00001640| 20 73 79 6d 62 6f 6c 70 | 5d 20 5b 22 3a 70 72 65 | symbolp|] [":pre|
|00001650| 64 69 63 61 74 65 22 20 | 73 79 6d 62 6f 6c 70 5d |dicate" |symbolp]|
|00001660| 20 5b 22 3a 69 6e 63 6c | 75 64 65 22 20 73 79 6d | [":incl|ude" sym|
|00001670| 62 6f 6c 70 20 26 72 65 | 73 74 20 73 65 78 70 5d |bolp &re|st sexp]|
|00001680| 29 29 5d 20 5b 26 6f 70 | 74 69 6f 6e 61 6c 20 73 |))] [&op|tional s|
|00001690| 74 72 69 6e 67 70 5d 20 | 26 72 65 73 74 20 26 6f |tringp] |&rest &o|
|000016a0| 72 20 73 79 6d 62 6f 6c | 70 20 28 73 79 6d 62 6f |r symbol|p (symbo|
|000016b0| 6c 70 20 64 65 66 2d 66 | 6f 72 6d 20 26 6f 70 74 |lp def-f|orm &opt|
|000016c0| 69 6f 6e 61 6c 20 22 3a | 72 65 61 64 2d 6f 6e 6c |ional ":|read-onl|
|000016d0| 79 22 20 73 65 78 70 29 | 29 20 6c 6f 6f 70 20 28 |y" sexp)|) loop (|
|000016e0| 26 72 65 73 74 20 26 6f | 72 20 73 79 6d 62 6f 6c |&rest &o|r symbol|
|000016f0| 70 20 66 6f 72 6d 29 20 | 28 5b 26 6f 70 74 69 6f |p form) |([&optio|
|00001700| 6e 61 6c 20 5b 22 6e 61 | 6d 65 64 22 20 73 79 6d |nal ["na|med" sym|
|00001710| 62 6f 6c 70 5d 5d 20 5b | 26 72 65 73 74 20 26 6f |bolp]] [|&rest &o|
|00001720| 72 20 5b 22 72 65 70 65 | 61 74 22 20 66 6f 72 6d |r ["repe|at" form|
|00001730| 5d 20 6c 6f 6f 70 2d 66 | 6f 72 2d 61 73 20 6c 6f |] loop-f|or-as lo|
|00001740| 6f 70 2d 77 69 74 68 20 | 6c 6f 6f 70 2d 69 6e 69 |op-with |loop-ini|
|00001750| 74 69 61 6c 2d 66 69 6e | 61 6c 5d 20 5b 26 72 65 |tial-fin|al] [&re|
|00001760| 73 74 20 6c 6f 6f 70 2d | 63 6c 61 75 73 65 5d 29 |st loop-|clause])|
|00001770| 20 6c 6f 6f 70 2d 77 69 | 74 68 20 28 22 77 69 74 | loop-wi|th ("wit|
|00001780| 68 22 20 6c 6f 6f 70 2d | 76 61 72 20 6c 6f 6f 70 |h" loop-|var loop|
|00001790| 2d 74 79 70 65 2d 73 70 | 65 63 20 5b 26 6f 70 74 |-type-sp|ec [&opt|
|000017a0| 69 6f 6e 61 6c 20 5b 22 | 3d 22 20 66 6f 72 6d 5d |ional ["|=" form]|
|000017b0| 5d 20 26 72 65 73 74 20 | 5b 22 61 6e 64 22 20 6c |] &rest |["and" l|
|000017c0| 6f 6f 70 2d 76 61 72 20 | 6c 6f 6f 70 2d 74 79 70 |oop-var |loop-typ|
|000017d0| 65 2d 73 70 65 63 20 5b | 26 6f 70 74 69 6f 6e 61 |e-spec [|&optiona|
|000017e0| 6c 20 5b 22 3d 22 20 66 | 6f 72 6d 5d 5d 5d 29 20 |l ["=" f|orm]]]) |
|000017f0| 6c 6f 6f 70 2d 66 6f 72 | 2d 61 73 20 28 5b 26 6f |loop-for|-as ([&o|
|00001800| 72 20 22 66 6f 72 22 20 | 22 61 73 22 5d 20 6c 6f |r "for" |"as"] lo|
|00001810| 6f 70 2d 66 6f 72 2d 61 | 73 2d 73 75 62 63 6c 61 |op-for-a|s-subcla|
|00001820| 75 73 65 20 26 72 65 73 | 74 20 5b 22 61 6e 64 22 |use &res|t ["and"|
|00001830| 20 6c 6f 6f 70 2d 66 6f | 72 2d 61 73 2d 73 75 62 | loop-fo|r-as-sub|
|00001840| 63 6c 61 75 73 65 5d 29 | 20 6c 6f 6f 70 2d 66 6f |clause])| loop-fo|
|00001850| 72 2d 61 73 2d 73 75 62 | 63 6c 61 75 73 65 20 28 |r-as-sub|clause (|
|00001860| 6c 6f 6f 70 2d 76 61 72 | 20 6c 6f 6f 70 2d 74 79 |loop-var| loop-ty|
|00001870| 70 65 2d 73 70 65 63 20 | 26 6f 72 20 5b 5b 26 6f |pe-spec |&or [[&o|
|00001880| 72 20 22 69 6e 22 20 22 | 6f 6e 22 20 22 69 6e 2d |r "in" "|on" "in-|
|00001890| 72 65 66 22 20 22 61 63 | 72 6f 73 73 2d 72 65 66 |ref" "ac|ross-ref|
|000018a0| 22 5d 20 66 6f 72 6d 20 | 26 6f 70 74 69 6f 6e 61 |"] form |&optiona|
|000018b0| 6c 20 5b 22 62 79 22 20 | 66 75 6e 63 74 69 6f 6e |l ["by" |function|
|000018c0| 2d 66 6f 72 6d 5d 5d 20 | 5b 22 3d 22 20 66 6f 72 |-form]] |["=" for|
|000018d0| 6d 20 26 6f 70 74 69 6f | 6e 61 6c 20 5b 22 74 68 |m &optio|nal ["th|
|000018e0| 65 6e 22 20 66 6f 72 6d | 5d 5d 20 5b 22 61 63 72 |en" form|]] ["acr|
|000018f0| 6f 73 73 22 20 66 6f 72 | 6d 5d 20 5b 22 62 65 69 |oss" for|m] ["bei|
|00001900| 6e 67 22 20 5b 26 6f 72 | 20 22 74 68 65 22 20 22 |ng" [&or| "the" "|
|00001910| 65 61 63 68 22 5d 20 26 | 6f 72 20 5b 5b 26 6f 72 |each"] &|or [[&or|
|00001920| 20 22 65 6c 65 6d 65 6e | 74 22 20 22 65 6c 65 6d | "elemen|t" "elem|
|00001930| 65 6e 74 73 22 5d 20 5b | 26 6f 72 20 22 6f 66 22 |ents"] [|&or "of"|
|00001940| 20 22 69 6e 22 20 22 6f | 66 2d 72 65 66 22 5d 20 | "in" "o|f-ref"] |
|00001950| 66 6f 72 6d 20 26 6f 70 | 74 69 6f 6e 61 6c 20 22 |form &op|tional "|
|00001960| 75 73 69 6e 67 22 20 5b | 22 69 6e 64 65 78 22 20 |using" [|"index" |
|00001970| 73 79 6d 62 6f 6c 70 5d | 5d 20 5b 5b 26 6f 72 20 |symbolp]|] [[&or |
|00001980| 22 68 61 73 68 2d 6b 65 | 79 22 20 22 68 61 73 68 |"hash-ke|y" "hash|
|00001990| 2d 6b 65 79 73 22 20 22 | 68 61 73 68 2d 76 61 6c |-keys" "|hash-val|
|000019a0| 75 65 22 20 22 68 61 73 | 68 2d 76 61 6c 75 65 73 |ue" "has|h-values|
|000019b0| 22 5d 20 5b 26 6f 72 20 | 22 6f 66 22 20 22 69 6e |"] [&or |"of" "in|
|000019c0| 22 5d 20 68 61 73 68 2d | 74 61 62 6c 65 2d 70 20 |"] hash-|table-p |
|000019d0| 26 6f 70 74 69 6f 6e 61 | 6c 20 5b 22 75 73 69 6e |&optiona|l ["usin|
|000019e0| 67 22 20 28 5b 26 6f 72 | 20 22 68 61 73 68 2d 76 |g" ([&or| "hash-v|
|000019f0| 61 6c 75 65 22 20 22 68 | 61 73 68 2d 76 61 6c 75 |alue" "h|ash-valu|
|00001a00| 65 73 22 20 22 68 61 73 | 68 2d 6b 65 79 22 20 22 |es" "has|h-key" "|
|00001a10| 68 61 73 68 2d 6b 65 79 | 73 22 5d 20 73 65 78 70 |hash-key|s"] sexp|
|00001a20| 29 5d 5d 20 5b 5b 26 6f | 72 20 22 73 79 6d 62 6f |)]] [[&o|r "symbo|
|00001a30| 6c 22 20 22 70 72 65 73 | 65 6e 74 2d 73 79 6d 62 |l" "pres|ent-symb|
|00001a40| 6f 6c 22 20 22 65 78 74 | 65 72 6e 61 6c 2d 73 79 |ol" "ext|ernal-sy|
|00001a50| 6d 62 6f 6c 22 20 22 73 | 79 6d 62 6f 6c 73 22 20 |mbol" "s|ymbols" |
|00001a60| 22 70 72 65 73 65 6e 74 | 2d 73 79 6d 62 6f 6c 73 |"present|-symbols|
|00001a70| 22 20 22 65 78 74 65 72 | 6e 61 6c 2d 73 79 6d 62 |" "exter|nal-symb|
|00001a80| 6f 6c 73 22 5d 20 5b 26 | 6f 72 20 22 69 6e 22 20 |ols"] [&|or "in" |
|00001a90| 22 6f 66 22 5d 20 70 61 | 63 6b 61 67 65 2d 70 5d |"of"] pa|ckage-p]|
|00001aa0| 20 5b 5b 26 6f 72 20 22 | 66 72 61 6d 65 22 20 22 | [[&or "|frame" "|
|00001ab0| 66 72 61 6d 65 73 22 20 | 22 73 63 72 65 65 6e 22 |frames" |"screen"|
|00001ac0| 20 22 73 63 72 65 65 6e | 73 22 20 22 62 75 66 66 | "screen|s" "buff|
|00001ad0| 65 72 22 20 22 62 75 66 | 66 65 72 73 22 5d 5d 20 |er" "buf|fers"]] |
|00001ae0| 5b 5b 26 6f 72 20 22 77 | 69 6e 64 6f 77 22 20 22 |[[&or "w|indow" "|
|00001af0| 77 69 6e 64 6f 77 73 22 | 5d 20 5b 26 6f 72 20 22 |windows"|] [&or "|
|00001b00| 6f 66 22 20 22 69 6e 22 | 5d 20 66 6f 72 6d 5d 20 |of" "in"|] form] |
|00001b10| 5b 5b 26 6f 72 20 22 6f | 76 65 72 6c 61 79 22 20 |[[&or "o|verlay" |
|00001b20| 22 6f 76 65 72 6c 61 79 | 73 22 20 22 65 78 74 65 |"overlay|s" "exte|
|00001b30| 6e 74 22 20 22 65 78 74 | 65 6e 74 73 22 5d 20 5b |nt" "ext|ents"] [|
|00001b40| 26 6f 72 20 22 6f 66 22 | 20 22 69 6e 22 5d 20 66 |&or "of"| "in"] f|
|00001b50| 6f 72 6d 20 26 6f 70 74 | 69 6f 6e 61 6c 20 5b 5b |orm &opt|ional [[|
|00001b60| 26 6f 72 20 22 66 72 6f | 6d 22 20 22 74 6f 22 5d |&or "fro|m" "to"]|
|00001b70| 20 66 6f 72 6d 5d 5d 20 | 5b 5b 26 6f 72 20 22 69 | form]] |[[&or "i|
|00001b80| 6e 74 65 72 76 61 6c 22 | 20 22 69 6e 74 65 72 76 |nterval"| "interv|
|00001b90| 61 6c 73 22 5d 20 5b 26 | 6f 72 20 22 69 6e 22 20 |als"] [&|or "in" |
|00001ba0| 22 6f 66 22 5d 20 66 6f | 72 6d 20 26 6f 70 74 69 |"of"] fo|rm &opti|
|00001bb0| 6f 6e 61 6c 20 5b 5b 26 | 6f 72 20 22 66 72 6f 6d |onal [[&|or "from|
|00001bc0| 22 20 22 74 6f 22 5d 20 | 66 6f 72 6d 5d 20 5b 22 |" "to"] |form] ["|
|00001bd0| 70 72 6f 70 65 72 74 79 | 22 20 66 6f 72 6d 5d 5d |property|" form]]|
|00001be0| 20 5b 5b 26 6f 72 20 22 | 6b 65 79 2d 63 6f 64 65 | [[&or "|key-code|
|00001bf0| 22 20 22 6b 65 79 2d 63 | 6f 64 65 73 22 20 22 6b |" "key-c|odes" "k|
|00001c00| 65 79 2d 73 65 71 22 20 | 22 6b 65 79 2d 73 65 71 |ey-seq" |"key-seq|
|00001c10| 73 22 20 22 6b 65 79 2d | 62 69 6e 64 69 6e 67 22 |s" "key-|binding"|
|00001c20| 20 22 6b 65 79 2d 62 69 | 6e 64 69 6e 67 73 22 5d | "key-bi|ndings"]|
|00001c30| 20 5b 26 6f 72 20 22 69 | 6e 22 20 22 6f 66 22 5d | [&or "i|n" "of"]|
|00001c40| 20 66 6f 72 6d 20 26 6f | 70 74 69 6f 6e 61 6c 20 | form &o|ptional |
|00001c50| 5b 22 75 73 69 6e 67 22 | 20 28 5b 26 6f 72 20 22 |["using"| ([&or "|
|00001c60| 6b 65 79 2d 63 6f 64 65 | 22 20 22 6b 65 79 2d 63 |key-code|" "key-c|
|00001c70| 6f 64 65 73 22 20 22 6b | 65 79 2d 73 65 71 22 20 |odes" "k|ey-seq" |
|00001c80| 22 6b 65 79 2d 73 65 71 | 73 22 20 22 6b 65 79 2d |"key-seq|s" "key-|
|00001c90| 62 69 6e 64 69 6e 67 22 | 20 22 6b 65 79 2d 62 69 |binding"| "key-bi|
|00001ca0| 6e 64 69 6e 67 73 22 5d | 20 73 65 78 70 29 5d 5d |ndings"]| sexp)]]|
|00001cb0| 20 5b 73 79 6d 62 6f 6c | 70 20 26 72 65 73 74 20 | [symbol|p &rest |
|00001cc0| 26 6f 72 20 73 79 6d 62 | 6f 6c 70 20 66 6f 72 6d |&or symb|olp form|
|00001cd0| 5d 5d 20 5b 5b 26 6f 70 | 74 69 6f 6e 61 6c 20 5b |]] [[&op|tional [|
|00001ce0| 5b 26 6f 72 20 22 66 72 | 6f 6d 22 20 22 64 6f 77 |[&or "fr|om" "dow|
|00001cf0| 6e 66 72 6f 6d 22 20 22 | 75 70 66 72 6f 6d 22 5d |nfrom" "|upfrom"]|
|00001d00| 20 66 6f 72 6d 5d 5d 20 | 5b 26 6f 70 74 69 6f 6e | form]] |[&option|
|00001d10| 61 6c 20 5b 5b 26 6f 72 | 20 22 74 6f 22 20 22 64 |al [[&or| "to" "d|
|00001d20| 6f 77 6e 74 6f 22 20 22 | 75 70 74 6f 22 20 22 62 |ownto" "|upto" "b|
|00001d30| 65 6c 6f 77 22 20 22 61 | 62 6f 76 65 22 5d 20 66 |elow" "a|bove"] f|
|00001d40| 6f 72 6d 5d 5d 20 5b 26 | 6f 70 74 69 6f 6e 61 6c |orm]] [&|optional|
|00001d50| 20 5b 22 62 79 22 20 66 | 6f 72 6d 5d 5d 5d 29 20 | ["by" f|orm]]]) |
|00001d60| 6c 6f 6f 70 2d 69 6e 69 | 74 69 61 6c 2d 66 69 6e |loop-ini|tial-fin|
|00001d70| 61 6c 20 28 26 6f 72 20 | 5b 22 69 6e 69 74 69 61 |al (&or |["initia|
|00001d80| 6c 6c 79 22 20 26 72 65 | 73 74 20 6c 6f 6f 70 2d |lly" &re|st loop-|
|00001d90| 6e 6f 6e 2d 61 74 6f 6d | 69 63 2d 65 78 70 72 5d |non-atom|ic-expr]|
|00001da0| 20 5b 22 66 69 6e 61 6c | 6c 79 22 20 26 6f 72 20 | ["final|ly" &or |
|00001db0| 5b 5b 26 6f 70 74 69 6f | 6e 61 6c 20 26 6f 72 20 |[[&optio|nal &or |
|00001dc0| 22 64 6f 22 20 22 64 6f | 69 6e 67 22 5d 20 26 72 |"do" "do|ing"] &r|
|00001dd0| 65 73 74 20 6c 6f 6f 70 | 2d 6e 6f 6e 2d 61 74 6f |est loop|-non-ato|
|00001de0| 6d 69 63 2d 65 78 70 72 | 5d 20 5b 22 72 65 74 75 |mic-expr|] ["retu|
|00001df0| 72 6e 22 20 66 6f 72 6d | 5d 5d 29 20 6c 6f 6f 70 |rn" form|]]) loop|
|00001e00| 2d 61 6e 64 2d 63 6c 61 | 75 73 65 20 28 6c 6f 6f |-and-cla|use (loo|
|00001e10| 70 2d 63 6c 61 75 73 65 | 20 26 72 65 73 74 20 5b |p-clause| &rest [|
|00001e20| 22 61 6e 64 22 20 6c 6f | 6f 70 2d 63 6c 61 75 73 |"and" lo|op-claus|
|00001e30| 65 5d 29 20 6c 6f 6f 70 | 2d 63 6c 61 75 73 65 20 |e]) loop|-clause |
|00001e40| 28 26 6f 72 20 5b 5b 26 | 6f 72 20 22 77 68 69 6c |(&or [[&|or "whil|
|00001e50| 65 22 20 22 75 6e 74 69 | 6c 22 20 22 61 6c 77 61 |e" "unti|l" "alwa|
|00001e60| 79 73 22 20 22 6e 65 76 | 65 72 22 20 22 74 68 65 |ys" "nev|er" "the|
|00001e70| 72 65 69 73 22 5d 20 66 | 6f 72 6d 5d 20 5b 5b 26 |reis"] f|orm] [[&|
|00001e80| 6f 72 20 22 63 6f 6c 6c | 65 63 74 22 20 22 63 6f |or "coll|ect" "co|
|00001e90| 6c 6c 65 63 74 69 6e 67 | 22 20 22 61 70 70 65 6e |llecting|" "appen|
|00001ea0| 64 22 20 22 61 70 70 65 | 6e 64 69 6e 67 22 20 22 |d" "appe|nding" "|
|00001eb0| 6e 63 6f 6e 63 22 20 22 | 6e 63 6f 6e 63 69 6e 67 |nconc" "|nconcing|
|00001ec0| 22 20 22 63 6f 6e 63 61 | 74 22 20 22 76 63 6f 6e |" "conca|t" "vcon|
|00001ed0| 63 61 74 22 5d 20 66 6f | 72 6d 20 5b 26 6f 70 74 |cat"] fo|rm [&opt|
|00001ee0| 69 6f 6e 61 6c 20 5b 22 | 69 6e 74 6f 22 20 6c 6f |ional ["|into" lo|
|00001ef0| 6f 70 2d 76 61 72 5d 5d | 5d 20 5b 5b 26 6f 72 20 |op-var]]|] [[&or |
|00001f00| 22 63 6f 75 6e 74 22 20 | 22 63 6f 75 6e 74 69 6e |"count" |"countin|
|00001f10| 67 22 20 22 73 75 6d 22 | 20 22 73 75 6d 6d 69 6e |g" "sum"| "summin|
|00001f20| 67 22 20 22 6d 61 78 69 | 6d 69 7a 65 22 20 22 6d |g" "maxi|mize" "m|
|00001f30| 61 78 69 6d 69 7a 69 6e | 67 22 20 22 6d 69 6e 69 |aximizin|g" "mini|
|00001f40| 6d 69 7a 65 22 20 22 6d | 69 6e 69 6d 69 7a 69 6e |mize" "m|inimizin|
|00001f50| 67 22 5d 20 66 6f 72 6d | 20 5b 26 6f 70 74 69 6f |g"] form| [&optio|
|00001f60| 6e 61 6c 20 5b 22 69 6e | 74 6f 22 20 6c 6f 6f 70 |nal ["in|to" loop|
|00001f70| 2d 76 61 72 5d 5d 20 6c | 6f 6f 70 2d 74 79 70 65 |-var]] l|oop-type|
|00001f80| 2d 73 70 65 63 5d 20 5b | 5b 26 6f 72 20 22 69 66 |-spec] [|[&or "if|
|00001f90| 22 20 22 77 68 65 6e 22 | 20 22 75 6e 6c 65 73 73 |" "when"| "unless|
|00001fa0| 22 5d 20 66 6f 72 6d 20 | 6c 6f 6f 70 2d 61 6e 64 |"] form |loop-and|
|00001fb0| 2d 63 6c 61 75 73 65 20 | 5b 26 6f 70 74 69 6f 6e |-clause |[&option|
|00001fc0| 61 6c 20 5b 22 65 6c 73 | 65 22 20 6c 6f 6f 70 2d |al ["els|e" loop-|
|00001fd0| 61 6e 64 2d 63 6c 61 75 | 73 65 5d 5d 20 5b 26 6f |and-clau|se]] [&o|
|00001fe0| 70 74 69 6f 6e 61 6c 20 | 22 65 6e 64 22 5d 5d 20 |ptional |"end"]] |
|00001ff0| 5b 5b 26 6f 72 20 22 64 | 6f 22 20 22 64 6f 69 6e |[[&or "d|o" "doin|
|00002000| 67 22 5d 20 26 72 65 73 | 74 20 6c 6f 6f 70 2d 6e |g"] &res|t loop-n|
|00002010| 6f 6e 2d 61 74 6f 6d 69 | 63 2d 65 78 70 72 5d 20 |on-atomi|c-expr] |
|00002020| 5b 22 72 65 74 75 72 6e | 22 20 66 6f 72 6d 5d 20 |["return|" form] |
|00002030| 6c 6f 6f 70 2d 69 6e 69 | 74 69 61 6c 2d 66 69 6e |loop-ini|tial-fin|
|00002040| 61 6c 29 20 6c 6f 6f 70 | 2d 6e 6f 6e 2d 61 74 6f |al) loop|-non-ato|
|00002050| 6d 69 63 2d 65 78 70 72 | 20 28 5b 26 6e 6f 74 20 |mic-expr| ([&not |
|00002060| 61 74 6f 6d 5d 20 66 6f | 72 6d 29 20 6c 6f 6f 70 |atom] fo|rm) loop|
|00002070| 2d 76 61 72 20 28 26 6f | 72 20 28 6c 6f 6f 70 2d |-var (&o|r (loop-|
|00002080| 76 61 72 20 2e 20 5b 26 | 6f 72 20 6e 69 6c 20 6c |var . [&|or nil l|
|00002090| 6f 6f 70 2d 76 61 72 5d | 29 20 5b 67 61 74 65 20 |oop-var]|) [gate |
|000020a0| 73 79 6d 62 6f 6c 70 5d | 29 20 6c 6f 6f 70 2d 74 |symbolp]|) loop-t|
|000020b0| 79 70 65 2d 73 70 65 63 | 20 28 26 6f 70 74 69 6f |ype-spec| (&optio|
|000020c0| 6e 61 6c 20 5b 22 6f 66 | 2d 74 79 70 65 22 20 6c |nal ["of|-type" l|
|000020d0| 6f 6f 70 2d 64 2d 74 79 | 70 65 2d 73 70 65 63 5d |oop-d-ty|pe-spec]|
|000020e0| 29 20 6c 6f 6f 70 2d 64 | 2d 74 79 70 65 2d 73 70 |) loop-d|-type-sp|
|000020f0| 65 63 20 28 26 6f 72 20 | 28 6c 6f 6f 70 2d 64 2d |ec (&or |(loop-d-|
|00002100| 74 79 70 65 2d 73 70 65 | 63 20 2e 20 5b 26 6f 72 |type-spe|c . [&or|
|00002110| 20 6e 69 6c 20 6c 6f 6f | 70 2d 64 2d 74 79 70 65 | nil loo|p-d-type|
|00002120| 2d 73 70 65 63 5d 29 20 | 63 6c 2d 74 79 70 65 2d |-spec]) |cl-type-|
|00002130| 73 70 65 63 29 5d 20 34 | 29 0a                   |spec)] 4|).      |
+--------+-------------------------+-------------------------+--------+--------+